-- background: 114030 from stack: in -- bmap block id: 114549 -- flags: 0000 -- background id: 0 -- name: Report Manager ----- HyperTalk script ----- on openBackground installMenuBar 1130,1131,1132,1133,1134,1135,1136,-206 end openBackground on doMenu menuItem lock screen if menuItem contains "About" then resetCards restoreMenuBar go to card short name of this background of background "About" unlock screen with zoom close else if menuItem is "Home" then resetCards restoreMenuBar go home else if menuItem contains "Quit" then resetCards restoreMenuBar false go to card "Mac School® Shell" unlock screen with zoom close else if menuItem is "New…" then go to card "New" of this background else if menuItem is "Open…" then go to card "Open Dialog" of this background else if menuItem is "Close" then visual zoom close go to first card of this background else if menuItem is "Transfer" then if short name of this card is "Attendance Report" then resetCards restoreMenuBar false go to background "CSL Attendance" else if short name of this card is "Letter" OR short name of this card is "Report Card" then resetCards restoreMenuBar false go to background "Report Cards" end if unlock screen with visual zoom open end if unlock screen end doMenu on groupOne repeat with index = 1 to 6 if index is not id of target then set hilite of background button id index to false end if end repeat if short name of target is "Hand" AND hilite of target then set hilite of target to true go next end if set hilite of target to true end groupOne on resetCards repeat with index = 2 to 6 set hilite of background button id index to false end repeat set hilite of background button id 1 to true end resetCards -- part 1 (button) -- low flags: 00 -- high flags: 4000 -- rect: left=450 top=61 right=82 bottom=475 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Hand ----- HyperTalk script ----- on mouseUp groupOne end mouseUp -- part 2 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=476 top=61 right=82 bottom=501 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Arrow ----- HyperTalk script ----- on mouseUp groupOne end mouseUp -- part 3 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=450 top=83 right=104 bottom=475 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Text ----- HyperTalk script ----- on mouseUp groupOne end mouseUp -- part 4 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=476 top=83 right=104 bottom=501 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Line ----- HyperTalk script ----- on mouseUp groupOne end mouseUp -- part 5 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=450 top=105 right=126 bottom=475 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Rectangle ----- HyperTalk script ----- on mouseUp groupOne end mouseUp -- part 6 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=476 top=105 right=126 bottom=501 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Round Rect ----- HyperTalk script ----- on mouseUp groupOne end mouseUp -- part 7 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=449 top=126 right=156 bottom=502 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: -- part 8 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=449 top=160 right=190 bottom=502 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: -- part 9 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=449 top=192 right=222 bottom=502 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: -- part 10 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=449 top=224 right=254 bottom=502 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: -- part 11 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=98 top=43 right=58 bottom=277 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: -- part 12 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=450 top=257 right=335 bottom=464 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: -- part 13 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=11 top=23 right=38 bottom=26 -- title width / last selected line: 0 -- icon id / first selected line: 5068 / 5068 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Close ----- HyperTalk script ----- on mouseDown set icon of me to "Close Box Hi" end mouseDown on mouseLeave set icon of me to "Close Box" end mouseLeave on mouseUp set icon of me to "Close Box" visual effect zoom close go to second card of this background end mouseUp